VB错误"424"

Private Sub Command1_Click()
If user_name_txt.Text = "tushuguan" And password_txt.Text = "tushuguan" Then
main.Show
logon.Hide
Else
MsgBox "您输入的密码和用户名不符，请重新输入！", vbOKOnly
End If
End Sub
麻烦哪位高人帮我看一下
显示的错误是实时错误"424":要求对象
调试显示的是“main.Show”这句有错误，可是我有main这个工程，为什么还是有错呢？请高人解释一下
刚刚已经换过工程名了，还是有问题啊？

首先user_name_txt和password_txt应该是两个文本框(Textbox)对象的名字。注意看是不是改过来了。
其次logon和main是两个窗体的名字，看是不是有这两个对象存在
再次是工程能用show，这一点同意上面的llbbzh和rekingchai
注释：
上面的联盟JJ 是瞎说，工程名字可以是main

需要对象（错误 424）

引用属性和方法经常需要一个明确的对象限定符。此错误有以下的原因和解决方法：

当引用对象属性或方法时，没有提供正确的对象限定符。
如果没有提供的话，指定一个对象限定符。例如，从窗体的模块中引用窗体属性时，虽然可以省略对象的限定符，但是当从标准模块中引用一个属性时，则必须指定限定符。

提供一个对象限定符，但不能识别出对象。
检查对象限定符的拼写，并确保在所引用的程序中此对象是可见的。在 Collection 对象中，请检查每个 Add 方法的使用，以确保语法应正确，以及所有部件的拼写应正确。

提供了正确的对象限定符，但调用的其他部分有错误。
将非法路径当作主机应用程序中“文件打开”命令的参数会引起错误。请检查参数。

在指定对象的引用时，没有使用 Set 语句。
如果指定 CreateObject 调用的返回值为 Variant 变量，那么如果省略 Set 语句的话，此错误就可能会发生。在以下的代码示例中，创建一 个 Microsoft Excel 隐含实例，且返回 Variant RetVal 的缺省属性 ("Microsoft Excel" 字符串）并赋给 Variant RetVal，然后将 RetVal 当作对象引用时，发生了此错误：

Dim RetVal ' 为一个 Variant。
' 缺省属性赋值为类型 8，即 Variant RetVal。
RetVal = CreateObject("Excel.Application")